
Cambios para activar el monitor en com2 en el 8000
--------------------------------------------------------------------------------------------------------------
--- resumen 1
--------------------------------------------------------------------------------------------------------------
original   3C 01 BF E1 90 39 80 01 A3 B9 00 06   '8001 com1
modificado 3C 01 BF E1 90 39 90 01 A3 B9 00 06   '9001 com2

original   3C 01 BF E1 90 23 80 00 A3 A3 00 07   '8000 com1    
modificado 3C 01 BF E1 90 23 90 00 A3 A3 00 07   '9000 com2    
--------------------------------------------------------------------------------------------------------------
--- resumen 2 (es lo mismo que el 1)
--------------------------------------------------------------------------------------------------------------
originales
81274378 3C 01 BF E1 90 39 80 01      lbu $t9, SIOS1_io_BFE08001     # status register de com1
81274380 A3 B9 00 06                  sb $t9, 6($sp)                 # pone el status register en 6($sp)
........
812743C0 3C 01 BF E1 90 23 80 00      lbu $v1, SIOD1_io_BFE08000     # lee 1 byte de com1
812743C8 A3 A3 00 07                  sb $v1, 7($sp)                 # lo pone en 7($sp)

modificadas
81274378 3C 01 BF E1 90 39 90 01      lbu $t9, SIOS2_io_BFE09001     # status register de com2
81274380 A3 B9 00 06                  sb $t9, 6($sp)                 # pone el status register en 6($sp)
........
812743C0 3C 01 BF E1 90 23 90 00      lbu $v1, SIOD2_io_BFE09000     # lee 1 byte de com2
812743C8 A3 A3 00 07                  sb $v1, 7($sp)                 # lo pone en 7($sp)
--------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------
--- rutina afectada
--------------------------------------------------------------------------------------------------------------
81274340                         lee_1_byte_com2_com1:               # CODE XREF: 81273CECp
81274340                                                             # 81274470p 81274538p
81274340                         
81274340                         var_2= -2
81274340                         arg_6=  6
81274340                         arg_E=  0xE
81274340                         arg_F=  0xF
81274340                         
81274340 3C 01 80 0B 8C 23 D4 E0      lw $v1, dword_800AD4E0         # 0
81274348 34 19 00 02                  li $t9, 2
8127434C 14 79 00 0A                  bne $v1, $t9, mira_estado_com2  # si dword_800AD4E0 != 2 lee del com2 si no de com1
81274350 27 BD FF F8                  addiu $sp, -8
81274354 3C 01 BF E1 90 39 90 01      lbu $t9, SIOS2_io_BFE90001     # status register de com2
8127435C A3 B9 00 06                  sb $t9, 6($sp)                 # pone el status register en 6($sp)
81274360 93 B9 00 06                  lbu $t9, 6($sp)
81274364 33 39 00 02                  andi $t9, 2
81274368 53 20 00 21                  beqzl $t9, dtr_off             # com2 sin dtr
8127436C 27 BD 00 08                  addiu $sp, 8
81274370                         
81274370                         
81274370 08 49 D0 E6                  j  lee_1_byte_de_com2
81274374 34 19 00 02                  li $t9, 2
81274378                          # ---------------------------------------------------------------------------
81274378                         dword_800AD4E0 != 2
81274378                         
81274378                         mira_estado_com2:                   # CODE XREF: 8127434Cj
81274378 3C 01 BF E1 90 39 80 01      lbu $t9, SIOS1_io_BFE08001     # status register de com1
81274380 A3 B9 00 06                  sb $t9, 6($sp)                 # pone el status register en 6($sp)
81274384 93 B9 00 06                  lbu $t9, 6($sp)
81274388 33 39 00 02                  andi $t9, 2
8127438C 53 20 00 18                  beqzl $t9, dtr_off             # com1 sin dtr
81274390 27 BD 00 08                  addiu $sp, 8
81274394                         
81274394                         
81274394 34 19 00 02                  li $t9, 2
81274398                         
81274398                         lee_1_byte_de_com2:                 # CODE XREF: 81274370j
81274398 14 79 00 09                  bne $v1, $t9, lee_1_byte_de_com1
8127439C 3C 01 BF E1 90 23 90 00      lbu $v1, SIOD2_io_BFE90000     # lee 1 byte de com2
812743A4 A3 A3 00 07                  sb $v1, 7($sp)                 # lo pone en 7($sp)
812743A8 93 A3 00 06                  lbu $v1, 6($sp)                # lee el status register guardado en 8127435C
812743AC 30 63 00 78                  andi $v1, 0x78
812743B0 50 60 00 0D                  beqzl $v1, vuelve_con_byte_leido  # dtr activo y buffer de salida con 7 bytes sin transmitir todava
812743B4 93 A2 00 07                  lbu $v0, 7($sp)
812743B8                         
812743B8                         
812743B8 08 49 D0 F8                  j  vuelve_con_0x40
812743BC 27 BD 00 08                  addiu $sp, 8
812743C0                          # ---------------------------------------------------------------------------
812743C0                         
812743C0                         lee_1_byte_de_com1:                 # CODE XREF: 81274398j
812743C0 3C 01 BF E1 90 23 80 00      lbu $v1, SIOD1_io_BFE08000     # lee 1 byte de com1
812743C8 A3 A3 00 07                  sb $v1, 7($sp)                 # lo pone en 7($sp)
812743CC 93 A3 00 06                  lbu $v1, 6($sp)                # lee el status register guardado en 8127435C
812743D0 30 63 00 78                  andi $v1, 0x78
812743D4 50 60 00 04                  beqzl $v1, vuelve_con_byte_leido  # dtr activo y buffer de salida con 7 bytes sin transmitir todava
812743D8 93 A2 00 07                  lbu $v0, 7($sp)
812743DC                         
812743DC                         
812743DC 27 BD 00 08                  addiu $sp, 8
812743E0                         
812743E0                         vuelve_con_0x40:                    # CODE XREF: 812743B8j
812743E0 03 E0 00 08                  jr $ra
812743E4 34 02 00 40                  li $v0, 0x40
812743E8                          # ---------------------------------------------------------------------------
812743E8                         
812743E8                         vuelve_con_byte_leido:              # CODE XREF: 812743B0j
812743E8                                                             # 812743D4j
812743E8 03 E0 00 08                  jr $ra
812743EC 27 BD 00 08                  addiu $sp, 8
812743F0                          # ---------------------------------------------------------------------------
812743F0                         
812743F0                         dtr_off:                            # CODE XREF: 81274368j
812743F0                                                             # 8127438Cj
812743F0 03 E0 00 08                  jr $ra
812743F4 24 02 FF FF                  li $v0, -1
812743F4                          # End of function lee_1_byte_com2_com1